/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / INTERNET / ACORNET / ACORN-ST / ACRNET21 / !AcornetA_AppLib_freetime

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0e f4 3e 66 72 | 65 65 74 69 6d 65 0d 00 |.....>fr|eetime..|
|00000010| 02 2f f4 3e 43 2e 43 61 | 72 70 65 6e 74 65 72 20 |./.>C.Ca|rpenter |
|00000020| 62 61 73 65 64 20 6f 6e | 20 63 6f 64 65 20 62 79 |based on| code by|
|00000030| 20 43 6f 6c 69 6e 20 48 | 6f 67 62 65 6e 0d 00 03 | Colin H|ogben...|
|00000040| 04 0d 00 04 14 dd 20 a4 | 66 72 65 65 74 69 6d 65 |...... .|freetime|
|00000050| 5f 69 6e 69 74 0d 00 05 | 06 3d 30 0d 00 06 04 0d |_init...|.=0.....|
|00000060| 00 07 29 dd 20 a4 66 72 | 65 65 74 69 6d 65 5f 6d |..). .fr|eetime_m|
|00000070| 65 74 68 6f 64 28 6d 65 | 74 68 6f 64 24 2c 61 72 |ethod(me|thod$,ar|
|00000080| 67 24 2c 6f 70 74 24 29 | 0d 00 08 04 0d 00 09 10 |g$,opt$)|........|
|00000090| c8 8e 20 6d 65 74 68 6f | 64 24 20 ca 0d 00 0a 29 |.. metho|d$ ....)|
|000000a0| c9 20 22 63 6f 6e 66 69 | 67 22 3a 20 3d c3 20 a4 |. "confi|g": =. .|
|000000b0| 66 72 65 65 74 69 6d 65 | 5f 63 6f 6e 66 69 67 28 |freetime|_config(|
|000000c0| 61 72 67 24 29 0d 00 0b | 10 c9 20 22 75 70 67 72 |arg$)...|.. "upgr|
|000000d0| 61 64 65 22 3a 0d 00 0c | 20 f2 75 70 67 72 61 64 |ade":...| .upgrad|
|000000e0| 65 5f 70 72 65 63 69 6f | 75 73 28 22 2e 63 6f 6e |e_precio|us(".con|
|000000f0| 66 69 67 22 29 0d 00 0d | 21 20 20 3d a4 75 70 67 |fig")...|!  =.upg|
|00000100| 72 61 64 65 5f 63 6f 70 | 79 5f 64 69 72 28 61 72 |rade_cop|y_dir(ar|
|00000110| 67 24 2c 22 22 29 0d 00 | 0e 05 cb 0d 00 0f 07 3d |g$,"")..|.......=|
|00000120| 22 22 0d 00 10 04 0d 00 | 11 1c dd 20 a4 66 72 65 |""......|... .fre|
|00000130| 65 74 69 6d 65 5f 63 6f | 6e 66 69 67 28 64 69 72 |etime_co|nfig(dir|
|00000140| 24 29 0d 00 12 54 f4 20 | 54 68 65 20 66 6f 6c 6c |$)...T. |The foll|
|00000150| 6f 77 69 6e 67 20 6c 69 | 6e 65 20 69 73 20 6e 65 |owing li|ne is ne|
|00000160| 65 64 65 64 20 69 6e 20 | 21 41 63 6f 72 6e 65 74 |eded in |!Acornet|
|00000170| 2e 61 70 70 73 2e 73 6c | 69 70 64 69 61 6c 2e 73 |.apps.sl|ipdial.s|
|00000180| 63 72 69 70 74 73 2e 61 | 63 6f 72 6e 65 74 2e 61 |cripts.a|cornet.a|
|00000190| 63 6f 72 6e 65 74 0d 00 | 13 44 f4 20 49 74 73 20 |cornet..|.D. Its |
|000001a0| 61 6c 72 65 61 64 79 20 | 61 64 64 65 64 20 69 6e |already |added in|
|000001b0| 20 74 68 69 73 20 76 65 | 72 73 69 6f 6e 20 2d 20 | this ve|rsion - |
|000001c0| 74 68 69 73 20 69 73 20 | 6a 75 73 74 20 66 6f 72 |this is |just for|
|000001d0| 20 72 65 66 65 72 65 6e | 63 65 0d 00 14 4b f4 20 | referen|ce...K. |
|000001e0| 22 74 61 73 6b 20 2f 6e | 61 6d 65 3d 46 72 65 65 |"task /n|ame=Free|
|000001f0| 54 69 6d 65 20 22 2b 43 | 48 52 24 28 33 34 29 2b |Time "+C|HR$(34)+|
|00000200| 22 52 75 6e 20 41 63 6f | 72 6e 65 74 3a 41 70 70 |"Run Aco|rnet:App|
|00000210| 73 2e 21 46 72 65 65 54 | 69 6d 65 22 2b 43 48 52 |s.!FreeT|ime"+CHR|
|00000220| 24 28 33 34 29 0d 00 15 | 31 f4 20 50 52 4f 43 61 |$(34)...|1. PROCa|
|00000230| 63 6f 72 6e 65 74 5f 61 | 70 70 28 22 66 72 65 65 |cornet_a|pp("free|
|00000240| 74 69 6d 65 22 2c 64 69 | 72 24 2c 22 46 72 65 65 |time",di|r$,"Free|
|00000250| 54 69 6d 65 22 29 0d 00 | 16 49 f2 75 70 64 61 74 |Time")..|.I.updat|
|00000260| 65 5f 6f 70 65 6e 28 61 | 63 6f 72 6e 65 74 5f 70 |e_open(a|cornet_p|
|00000270| 61 74 68 24 2b 22 75 74 | 69 6c 73 2e 21 73 6c 69 |ath$+"ut|ils.!sli|
|00000280| 70 64 69 61 6c 2e 73 63 | 72 69 70 74 73 2e 61 63 |pdial.sc|ripts.ac|
|00000290| 6f 72 6e 65 74 2e 61 63 | 6f 72 6e 65 74 22 29 0d |ornet.ac|ornet").|
|000002a0| 00 17 1a c8 95 20 a4 75 | 70 64 61 74 65 5f 72 65 |..... .u|pdate_re|
|000002b0| 61 64 28 6c 69 6e 65 24 | 29 0d 00 18 31 20 20 e7 |ad(line$|)...1  .|
|000002c0| 20 a7 6c 69 6e 65 24 2c | 22 46 72 65 65 54 69 6d | .line$,|"FreeTim|
|000002d0| 65 22 29 3d 30 20 f2 75 | 70 64 61 74 65 5f 77 72 |e")=0 .u|pdate_wr|
|000002e0| 69 74 65 28 6c 69 6e 65 | 24 29 0d 00 19 05 ce 0d |ite(line|$)......|
|000002f0| 00 1a 11 f2 75 70 64 61 | 74 65 5f 63 6c 6f 73 65 |....upda|te_close|
|00000300| 0d 00 1b 49 f2 75 70 64 | 61 74 65 5f 6f 70 65 6e |...I.upd|ate_open|
|00000310| 28 61 63 6f 72 6e 65 74 | 5f 70 61 74 68 24 2b 22 |(acornet|_path$+"|
|00000320| 75 74 69 6c 73 2e 21 73 | 6c 69 70 64 69 61 6c 2e |utils.!s|lipdial.|
|00000330| 73 63 72 69 70 74 73 2e | 61 63 6f 72 6e 65 74 2e |scripts.|acornet.|
|00000340| 61 63 6f 72 6e 65 74 22 | 29 0d 00 1c 1a c8 95 20 |acornet"|)...... |
|00000350| a4 75 70 64 61 74 65 5f | 72 65 61 64 28 6c 69 6e |.update_|read(lin|
|00000360| 65 24 29 0d 00 1d 25 20 | 20 e7 20 c0 6c 69 6e 65 |e$)...% | . .line|
|00000370| 24 2c 31 34 29 3d 22 67 | 6f 74 6f 20 46 72 65 65 |$,14)="g|oto Free|
|00000380| 6e 65 74 4f 6e 22 20 8c | 0d 00 1e 54 20 20 20 20 |netOn" .|...T    |
|00000390| 6c 69 6e 65 32 24 3d 22 | 74 61 73 6b 20 2f 6e 61 |line2$="|task /na|
|000003a0| 6d 65 3d 46 72 65 65 54 | 69 6d 65 20 22 2b bd 28 |me=FreeT|ime "+.(|
|000003b0| 33 34 29 2b 22 66 69 6c | 65 72 5f 52 75 6e 20 41 |34)+"fil|er_Run A|
|000003c0| 63 6f 72 6e 65 74 3a 41 | 70 70 73 2e 21 46 72 65 |cornet:A|pps.!Fre|
|000003d0| 65 54 69 6d 65 22 2b bd | 28 33 34 29 0d 00 1f 1d |eTime"+.|(34)....|
|000003e0| 20 20 20 20 f2 75 70 64 | 61 74 65 5f 77 72 69 74 |    .upd|ate_writ|
|000003f0| 65 28 6c 69 6e 65 32 24 | 29 0d 00 20 07 20 20 cd |e(line2$|).. .  .|
|00000400| 0d 00 21 1a 20 20 f2 75 | 70 64 61 74 65 5f 77 72 |..!.  .u|pdate_wr|
|00000410| 69 74 65 28 6c 69 6e 65 | 24 29 0d 00 22 05 ce 0d |ite(line|$).."...|
|00000420| 00 23 11 f2 75 70 64 61 | 74 65 5f 63 6c 6f 73 65 |.#..upda|te_close|
|00000430| 0d 00 24 04 0d 00 25 04 | 0d 00 26 04 0d 00 27 04 |..$...%.|..&...'.|
|00000440| 0d 00 28 04 0d 00 29 04 | 0d 00 2a 06 3d 31 0d ff |..(...).|..*.=1..|
+--------+-------------------------+-------------------------+--------+--------+